Для управления сервером из VB используется технология SQL DMO. Для того, чтобы Вы могли программировать необходимо иметь набор DLL и библиотек типов. Установите SQL Server Client в полной конфигурации и все необходимое у Вас будет. Итак, подключаем библиотеку типов.

С этого момента у нас есть возможность управлять сервером. Мы можем получить теже самые возможности, что и Enterprise Manager, только мы можем сами создавать интерфейс и дополнительные возможности. Давайте посмотрим код соединения.

Private Sub Command1_Click()
Dim oSQLServer As New SQLOLE.SQLServer
Dim strHost As String
oSQLServer.Connect "Servers", "sa", "123"
strHost = oSQLServer.HostName
MsgBox strHost
oSQLServer.DisConnect
End Sub